home *** CD-ROM | disk | FTP | other *** search
/ The Fatted Calf / The Fatted Calf.iso / Applications / Communication / NewsBase / Source / IFontSetField.m < prev    next >
Encoding:
Text File  |  1993-01-12  |  553 b   |  31 lines
  1.  
  2. /* Generated by Interface Builder */
  3.  
  4. #import "IFontSetField.h"
  5. #import <appkit/FontManager.h>
  6. #import <appkit/Font.h>
  7.  
  8. @implementation IFontSetField
  9.  
  10. - openFontPanel:sender
  11. {
  12.     [self selectText:self];
  13.     [oFontManager orderFrontFontPanel:self];
  14.     return self;
  15. }
  16.  
  17. - changeFont:sender
  18. {
  19.     id        fontObj;
  20.     char    buf[256];
  21.     
  22.     fontObj = [oFontManager convertFont:[oFontManager selFont]];
  23.     sprintf(buf, "%.127s:%.0f", [fontObj name], [fontObj pointSize]);
  24.     [self setStringValue:buf];
  25.     [self selectText:self];
  26.  
  27.     return self;
  28. }
  29.  
  30. @end
  31.